package com.lincoln.framework.factories;

import com.lincoln.framework.NettyServer;
import com.lincoln.framework.annotation.Execute;
import com.lincoln.framework.annotation.ExecuteTypeEnum;
import com.lincoln.framework.interfaces.BaseExecute;
import lombok.Getter;
import lombok.Setter;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;

import java.io.File;
import java.io.IOException;
import java.lang.annotation.Annotation;
import java.net.JarURLConnection;
import java.net.URL;
import java.net.URLDecoder;
import java.util.*;
import java.util.jar.JarEntry;
import java.util.jar.JarFile;

/**
 * @param
 * @author ziyao.peng01@ucarinc.com
 * @description 协议工厂
 * @date 2018/11/29 15:36
 * @return
 */
public class ProtocolFactoryBean {
    private static Logger logger = LoggerFactory.getLogger(ProtocolFactoryBean.class);
    @Getter
    @Setter
    private int deviceType;
    @Getter
    @Setter
    private int protocolType;
    /**
     * 登陆指令
     */
    @Getter
    @Setter
    private BaseExecute login;

    /**
     * 心跳指令
     */
    @Getter
    @Setter
    private BaseExecute heartBeat;

    /**
     * String是byte[]遍历转成String
     */
    @Getter
    @Setter
    Map<String, BaseExecute> cmds = new HashMap<>();

    ProtocolFactoryBean(int deviceType, int protocolType, String classPath) {
        this.deviceType = deviceType;
        this.protocolType = protocolType;
        if (deviceType == -1 && protocolType == -1) {
            return;
        }
        scan(classPath);
    }

    ProtocolFactoryBean(int deviceType, int protocolType) {
        this.deviceType = deviceType;
        this.protocolType = protocolType;
    }

    public BaseExecute getExecute(Object cmd) {
        return cmds.get(cmd);
    }

    public boolean addCmd(ExecuteTypeEnum executeTypeEnum, BaseExecute execute) {
        if (executeTypeEnum == ExecuteTypeEnum.LOGIN) {
            this.login = execute;
            NettyServer.addDefaultExecute(execute);
        }
        if (executeTypeEnum == ExecuteTypeEnum.HEART_BEAT) {
            this.heartBeat = execute;
        }
        cmds.put(execute.getClientCmdText(), execute);
        return true;
    }

    public boolean scan(String classPath) {
        try {
            Set<Class<?>> set = getClasses(classPath);
            for (Class clazz : set) {
                Annotation[] annotations = clazz.getAnnotations();
                if (annotations != null && annotations.length > 0) {
                    for (Annotation annotation : annotations) {
                        if (annotation.annotationType().equals(Execute.class)) {
                            int deviceType1 = ((Execute) annotation).deviceType();
                            int protocolType1 = ((Execute) annotation).protocolType();
                            int[] deviceTypes1 = ((Execute) annotation).deviceTypes();
                            int[] protocolTypes1 = ((Execute) annotation).protocolTypes();
                            ExecuteTypeEnum executeTypeEnum = ((Execute) annotation).executeType();
                            if (deviceType1 == deviceType && protocolType1 == protocolType) {
                                Object object = clazz.newInstance();
                                addCmd(executeTypeEnum, (BaseExecute) object);
                            } else {
                                if (deviceTypes1.length > 0 && protocolTypes1.length > 0) {
                                    boolean deviceTypeFlag = false;
                                    boolean protocolTypeFlag = false;
                                    for (int i : deviceTypes1) {
                                        if (i == deviceType) {
                                            deviceTypeFlag = true;
                                            break;
                                        }
                                    }
                                    if (deviceTypeFlag) {
                                        for (int i : protocolTypes1) {
                                            if (i == protocolType) {
                                                protocolTypeFlag = true;
                                                break;
                                            }
                                        }
                                    }
                                    if (deviceTypeFlag && protocolTypeFlag) {
                                        Object object = clazz.newInstance();
                                        addCmd(executeTypeEnum, (BaseExecute) object);
                                    }
                                }

                            }
                        }
                    }
                }
            }
            logger.info("设备类型:" + deviceType + "|协议类型:" + protocolType + "共加载" + cmds.size() + "个解析包");
            return true;
        } catch (Exception e) {
            return false;
        }
    }

    /**
     * 从包package中获取所有的Class
     *
     * @param packageName
     * @return
     */
    public static Set<Class<?>> getClasses(String packageName) throws Exception {

        Set<Class<?>> classes = new HashSet<>();
        // 是否循环迭代
        boolean recursive = true;
        // 获取包的名字 并进行替换
        String packageDirName = packageName.replace('.', '/');
        // 定义一个枚举的集合 并进行循环来处理这个目录下的things
        Enumeration<URL> dirs;
        try {
            dirs = Thread.currentThread().getContextClassLoader().getResources(packageDirName);
            // 循环迭代下去
            while (dirs.hasMoreElements()) {
                // 获取下一个元素
                URL url = dirs.nextElement();
                // 得到协议的名称
                String protocol = url.getProtocol();
                // 如果是以文件的形式保存在服务器上
                if ("file".equals(protocol)) {
                    // 获取包的物理路径
                    String filePath = URLDecoder.decode(url.getFile(), "UTF-8");
                    // 以文件的方式扫描整个包下的文件 并添加到集合中，以下俩种方法都可以
                    findAndAddClassesInPackageByFile(packageName, filePath, recursive, classes);
                } else if ("jar".equals(protocol)) {
                    // 如果是jar包文件
                    JarFile jar;
                    try {
                        // 获取jar
                        jar = ((JarURLConnection) url.openConnection()).getJarFile();
                        // 从此jar包 得到一个枚举类
                        Enumeration<JarEntry> entries = jar.entries();
                        // 同样的进行循环迭代
                        while (entries.hasMoreElements()) {
                            // 获取jar里的一个实体 可以是目录 和一些jar包里的其他文件 如META-INF等文件
                            JarEntry entry = entries.nextElement();
                            String name = entry.getName();
                            // 如果是以/开头的
                            if (name.charAt(0) == '/') {
                                // 获取后面的字符串
                                name = name.substring(1);
                            }
                            // 如果前半部分和定义的包名相同
                            if (name.startsWith(packageDirName)) {
                                int idx = name.lastIndexOf('/');
                                // 如果以"/"结尾 是一个包
                                if (idx != -1) {
                                    // 获取包名 把"/"替换成"."
                                    packageName = name.substring(0, idx).replace('/', '.');
                                }
                                // 如果可以迭代下去 并且是一个包
                                if ((idx != -1) || recursive) {
                                    // 如果是一个.class文件 而且不是目录
                                    if (name.endsWith(".class") && !entry.isDirectory()) {
                                        // 去掉后面的".class" 获取真正的类名
                                        String className = name.substring(packageName.length() + 1, name.length() - 6);
                                        try {
                                            // 添加到classes
                                            classes.add(Class.forName(packageName + '.' + className));
                                        } catch (ClassNotFoundException e) {
                                            e.printStackTrace();
                                        }
                                    }
                                }
                            }
                        }
                    } catch (IOException e) {
                        e.printStackTrace();
                    }
                }
            }
        } catch (IOException e) {
            e.printStackTrace();
        }

        return classes;
    }

    /**
     * 以文件的形式来获取包下的所有Class
     *
     * @param packageName
     * @param packagePath
     * @param recursive
     * @param classes
     */
    public static void findAndAddClassesInPackageByFile(String packageName, String packagePath, final boolean recursive, Set<Class<?>> classes) {
        // 获取此包的目录 建立一个File
        File dir = new File(packagePath);
        // 如果不存在或者 也不是目录就直接返回
        if (!dir.exists() || !dir.isDirectory()) {
            return;
        }
        // 如果存在 就获取包下的所有文件 包括目录
        // 自定义过滤规则 如果可以循环(包含子目录) 或则是以.class结尾的文件(编译好的java类文件)
        File[] dirfiles = dir.listFiles(file -> (recursive && file.isDirectory())
                || (file.getName().endsWith(".class")));
        // 循环所有文件
        for (File file : dirfiles) {
            // 如果是目录 则继续扫描
            if (file.isDirectory()) {
                findAndAddClassesInPackageByFile(packageName + "."
                                + file.getName(), file.getAbsolutePath(), recursive,
                        classes);
            } else {
                // 如果是java类文件 去掉后面的.class 只留下类名
                String className = file.getName().substring(0,
                        file.getName().length() - 6);
                try {
                    classes.add(Thread.currentThread().getContextClassLoader().loadClass(packageName + '.' + className));
                } catch (ClassNotFoundException e) {
                    e.printStackTrace();
                }
            }
        }
    }
}
